home *** CD-ROM | disk | FTP | other *** search
/ AGA Toolkit '97 / The AGA Toolkit '97.iso / miscellaneous / patch / patch2amitcp_4.3 / bin / patcher < prev    next >
Encoding:
AmigaDOS Script File  |  1996-09-07  |  1.3 KB  |  69 lines
  1. .KEY RXCMD/A,tdir/A,SFILE/A,PFILE/A
  2. .BRA {
  3. .KET }
  4.  
  5. If Exists ENV:installer-result
  6.     Delete ENV:installer-result Quiet Force
  7. EndIf
  8.  
  9. set sum=`bin/tmd5sum "{SFILE}"`
  10.  
  11. FailAt 11
  12. {RXCMD} bin/patchfiles $sum patch/{PFILE} >"ENV:installer-result"
  13.  
  14. If ERROR
  15.     unset sum
  16.     Quit 10
  17. endif
  18. unset sum
  19.  
  20. set patches=`Type ENV:installer-result`
  21. Delete ENV:installer-result Quiet Force
  22. ;Echo RXOUT $patches
  23.  
  24. if "$patches" EQ "NOMATCH"
  25.     Echo "Patch files not found !!!!" >"ENV:installer-result"
  26.     unset patches
  27.     Quit 11
  28. endif
  29.  
  30. if "$patches" EQ "PATCHED"
  31.     Echo {SFILE} "Already patched" >"ENV:installer-result"
  32.     unset patches
  33.     Quit 5
  34. endif
  35.  
  36. If Exists {tdir}NSDi_patched
  37.     Delete {tdir}NSDi_patched Quiet Force
  38. endif
  39. Copy "{SFILE}" {tdir}NSDi_patched
  40.  
  41. Lab Loop
  42.  
  43. set patchfile=`{RXCMD} "Say DelWord('$patches', 2)"`
  44. ;Echo PATCHFILE $patchfile
  45.  
  46. set patches="`{RXCMD} "Say DelWord('$patches', 1, 1)"`"
  47. ;Echo PATCHES $patches
  48.  
  49. If "$patches" EQ ""
  50. ;    set sum=`bin/tmd5sum {tdir}NSDi_patched`
  51. ;    If $sum NOT EQ $patchfile
  52. ;        Echo "Incorrect result file" >"ENV:installer-result"
  53. ;        unset patches
  54. ;        unset patchfiles
  55. ;        Quit 5
  56. ;    EndIf
  57.     Skip loppu
  58. EndIf
  59.  
  60. bin/spatch -o{tdir}NSDi_patching -ppatch/$patchfile {tdir}NSDi_patched
  61. Delete {tdir}NSDi_patched force quiet
  62. Rename {tdir}NSDi_patching {tdir}NSDi_patched
  63.  
  64. Skip BACK loop
  65. Lab loppu
  66.  
  67. unset patches
  68. unset patchfile
  69.